Top 10k strings from MicroHobby Semanal - Issue 001-004 (1984)(Hobby Press)(es)(Side A).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   5 cl+(sm*px),(
   4 cx=(sm*x)+y+cl:
   4 ;"                                "
   4 (cl+sm*px)-2
   3 JJJ=NN*(JJ-1
   3 III=NN*(II-1
   3 ;"ESPERE UN MOMENTO, POR FAVOR"
   3 ;"CARACTER NO DEFINIDO":
   3   pulse Enter
   2 s=(s+(c*12
   2 ;"SCORE:  ";s;
   2 ;"PUNTOS ";v:
   2 ;"   ";e$;
   2 ;"                                ":
   2 +I,JJJ+NN:
   2 "Biorritmos"
   2 "ANDROMEDA"
   2   Break para parar
   1 y=vy*t-(9.81
   1 xxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzzzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxzxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzxzzzzzzzzzzzzzzzzxxxxxxxxxzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxzzzzzzzzzzzzzzzz                                                                
   1 x$=v$+x$+v$(
   1 t$(c0,is+1
   1 t$(c0,i)=a$:
   1 s$="POSITIVO"
   1 s$="NEGATIVO":
   1 o del calculo    ";af:
   1 o de nacimiento    ";ai
   1 l$="     "+l$:
   1 d$=d$+i$+s$+i$
   1 crear un caracter
   1 copi      
   1 contador>99
   1 contador>16
   1 contador=contador+1
   1 contador=1
   1 contador=0
   1 c$="     "+c$:
   1 c$="      "
   1 a$="00000000":
   1 VISUALIzAR CARACTER
   1 TZX por Manuel Gomez Amate
   1 SPACE=23659
   1 SPACE,LINEA:
   1 SAVE CARACTERES
   1 RESTO DE PANTALLA
   1 Plotter   
   1 Pipeline  p7
   1 PLAY=PLAY+1
   1 PLAY=B(JJ+1
   1 PLAY=((II=1
   1 PINTA CURSOR
   1 Numeros   H
   1 Microcopi 
   1 MOVE=MOVE+1
   1 MODIFICAR UN CARACTER
   1 MICRO     
   1 Listador  
   1 LONGITUD: 
   1 LOAD CARACTERES
   1 LAST=23560
   1 JUEGO DEL "gugu" POR MANUEL GLEZ. DE CASTEJON
   1 JOSE M. DIAZ                        1984
   1 JJ=JJ+(EG=1
   1 INTER=D(N+1
   1 INSERTAR/BORRAR CURSOR
   1 II=II+(EG=3
   1 Hobby Press
   1 HS=NN*(BD-1
   1 Gugu      
   1 Editor    
   1 ESPERAR TECLA
   1 ERROR DE CARGA
   1 EG=D(EG,PLAY)
   1 EDITOR DE CARACTERES              
   1 Duelostar 
   1 Domingo Gomez 
   1 DIBUJA TABLERO
   1 D(EG,PLAY)=E(JJ,II)
   1 Castellano
   1 Cargador  ^
   1 CONTROL DEL CURSOR
   1 CONT=CONT+1
   1 COMIENZO: 
   1 COLOREAR UN CARACTER
   1 CINTA8    l
   1 CINTA 01 CARA A
   1 C$="  Por favor, elija un programa  "
   1 Biorritmos
   1 Balistica 
   1 B(I,J)=-(I=1
   1 B$="                                "
   1 Aterriza  
   1 Andromeda >
   1 ASTERISCOS
   1 A$="00000000":
   1 ;v;"     ";a1;"   ";w;"  ":
   1 ;''''''"          MANDOS";
   1 ;"cara: ";
   1 ;"VERIFIQUE. TODO CORRECTO? (s/n)"
   1 ;"VERIFICACION CORRECTA":
   1 ;"Tiempo=";n
   1 ;"TRANSFIERO CARACTERES A";
   1 ;"REGLAS A)LOS JUGADORES ALTERNAN SU TURNO DE JUEGO B)CADA JUGADA DEBE EXTENDER LA TUBERIA EN UN  LUGAR ADYACENTE"
   1 ;"RACTERES:";
   1 ;"QUE CARACTER? ";
   1 ;"Programa: ";
   1 ;"Programa inexistente":
   1 ;"PULSE UNA TECLA";
   1 ;"PULSE CUALQUIER TECLA."
   1 ;"PULSE CUALQUIER TECLA"
   1 ;"PULSAR UNA TECLA PARA EMPEZAR":
   1 ;"PULSAR UNA TECLA PARA EMPEZAR"
   1 ;"PULSA CUALQUIER TECLA.":
   1 ;"PUEDE TAMBIEN ELEGIR EN ""NIVEL  DE JUEGO""(1=PRINCIPIANTE,2=AVAN-ZADO)"
   1 ;"PRINCIPIANTE"
   1 ;"PONGA EN MARCHA LA CINTA";
   1 ;"PIPELINE"
   1 ;"PARE LA CINTA.REBOBINE"
   1 ;"PARA VERIFICAR.PULSE";
   1 ;"Nivel dificultad (1-8)          1.....dificil                   8.....facil                     "'v:
   1 ;"NUMERO DE INTENTOS = ";CONT-1
   1 ;"NUM. DE INTENTOS = ";CONT
   1 ;"NOMBRE DEL JUEGO DE CA-";
   1 ;"Maquina=";
   1 ;"MICRO ";
   1 ;"MENU IN";
   1 ;"MALA SUERTE-PIERDE"
   1 ;"LA MEMORIA"
   1 ;"LA IDEA DEL JUEGO ES LLEGAR CON NUESTRA TUBERIA A LA ESQUINA SU-PERIOR DERECHA DE LA PANTALLA,O BIEN EXPULSAR A NUESTRO OPONENTEDEL TABLERO"
   1 ;"INSTRUCCIONES"
   1 ;"Humano=";
   1 ;"HIGH: ";h:
   1 ;"HIGH:  ";h:
   1 ;"HAS CONSEGUIDO ATERRIZAR!":
   1 ;"Gano ";:
   1 ;"GUGU TIENE QUE COMERSE TODOS LOS":
   1 ;"GRAFICOS DEFINIDOS:"
   1 ;"GRAFICO: ";
   1 ;"Fecha del Calculo: ";df;"/";mf;"/";af
   1 ;"Fecha de Nacimiento: ";di;"/";mi;"/";ai
   1 ;"FIN TRANSFERENCIA A    "
   1 ;"FICHAS";
   1 ;"FELICIDADES EN SU ";:
   1 ;"FALLO ";z:
   1 ;"ESPERARE HASTA QUE ELIJA EN""ORD-EN DE JUEGO"" (1=USTED PRIMERO), 2=YO PRIMERO)"
   1 ;"ENTER ACTIVA MENU"
   1 ;"ELIJE TINTA";
   1 ;"ELIJE PAPEL";
   1 ;"Desea borrar la pantalla? s/n"
   1 ;"DIBUJO";
   1 ;"DIA SEMICRITICO"
   1 ;"DIA CRITICO"
   1 ;"DATO INCORRECTO":
   1 ;"Color nuevo borde y papel ?";p''"Color nuevo tinta ?";t
   1 ;"CUALQUIER TECLA":
   1 ;"CORRECTO-USTED GANA"
   1 ;"COMANDO VERIFY ACTIVO.":
   1 ;"COMANDO SAVE ACTIVO"
   1 ;"COMANDO LOAD ACTIVO"
   1 ;"CARGA FINALIZADA";
   1 ;"CARACTERES NO DEFINIDOS":
   1 ;"BIORRITMOS";
   1 ;"BIORRITMOS":
   1 ;"ATENCION:JUEGO COMPLETO":
   1 ;"ACTIVO":
   1 ;"4-CARGAR CARACTERES"
   1 ;"3000 EXTRA":
   1 ;"3-GRABAR CARACTERES"
   1 ;"2-COLOREAR CARACTERES"
   1 ;"1-MODIFICAR CARACTERES"
   1 ;"0-CREAR CARACTERES"
   1 ;"------JUEGO TERMINADO------"
   1 ;"----------"
   1 ;"'R' Vuelve al menu"
   1 ;"'L' Carga el programa";
   1 ;"'F' FIJA CURSOR"
   1 ;"'B' BORRA CURSOR"
   1 ;" PIPELINE":
   1 ;" PARA SEGUIR.":
   1 ;" MUY BIEN ":
   1 ;" ENSAMBLAJE ":
   1 ;" AVANZADO"
   1 ;"  GAME OVER  ":
   1 ;"       ";
   1 ;"          ";
   1 ;"            ";
   1 ;"                           ":
   1 ;"                                NECESITA MAS INFORMACION ? (s/n)"
   1 -J)=D(I+J-1
   1 ,D.L.: M-36598-84
   1 +I,JJJ+LW+4
   1 +I),-(NN-5
   1 +(px-pr)*100
   1 +"N. Tipo Nombre  Comienz. Long."+
   1 +"CINTA:"+
   1 *** CINTA-MICROHOBBY ***
   1 *    PIPELINE         *
   1 )="1")+(i*8
   1 )+(JJ=BD)*(EG=4
   1 )+(JJ=BD)*(EG=3
   1 )+(JJ=BD)*(EG=1
   1 )+(II=BD)*(EG=3
   1 )+(II=BD)*(EG=2
   1 )+(II=BD)*(EG=1
   1 (dt/dc)*dc
   1 (cl+sm*px)+2
   1 (VALOR)<"A"
   1 (NN-I),-(NN-I)
   1 ''"Pulse una tecla para empezar"
   1 ''"Para ello a de hacer el mayor   numero de aciertos posibles     en un tiempo determinado.       La maquina a su vez tratara de  acertarle a usted !!!EVITELO!!!"
   1 ''"Ltd Francisco Lopez Castro 
   1 ''"El juego trata de una lucha     entre usted y la maquina a la   cual a de vencer."
   1 ''"     1..........Izquierda"''"     2..........derecha"''"     0..........Laser"
   1 '"Pulse  PLAY ":
   1 "yo, la MAQUINA"
   1 "usted, HUMANO":
   1 "sentacion entrara automaticamen","te en el modo ' ******** menu  "
   1 "radio ";r:
   1 "pasos,1-5 ?";e:
   1 "en pantalla.                    ","Esperamos que el progama te re-","sulte util y divertido.        "
   1 "diante un menu de 5 opciones.Al"," finalizar este mensaje de pre-"
   1 "desea volver a jugar (s/n)?";s$:
   1 "activo ****** ' .Sigue las ins-","trucciones que iran apareciendo"
   1 "Veloc. inicial?Ej:50. m/s= ";vi
   1 "Trancurridos ";dt;" dias de vida.":
   1 "Tiempo de vuelo=";tv;"s."
   1 "SU JUGADA(1,2 O 3)";PLAY
   1 "SOLO? (S/N)",
   1 "SI NO QUIERES JUGAR MAS PULSA N";n$
   1 "SE ACABO EL TIEMPO":
   1 "QUIERE JUGAR OTRA VEZ (S/N)? ";S$
   1 "Programa grabado"''"Rebobine la cinta y pulse"'"una tecla para verificar":
   1 "Para los circulos poner un radio menor que las coordenadas del  plot"
   1 "PARA SEGUIR, PULSA ENTER";a$:
   1 "PARA OTRO JUEGO PULSA LA TECLA S";a$
   1 "PARA JUGAR PULSA ENTER";s$
   1 "OTRA PARTIDA? (SI=s,NO=n)";
   1 "ORDEN DE JUEGO (1/2) ";PO:
   1 "Nombre del dibujo ?";a$:
   1 "Nombre de la cinta: ";
   1 "NOMBRE:";p$
   1 "NIVEL DE JUEGO (1/2) ";PL
   1 "MicroHobby Semanal numeros 01 a 04
   1 "Mes del calculo    ";mf:
   1 "Mes de nacimiento    ";mi:
   1 "MI JUGADA(1,2 O 3)";PLAY
   1 "MANDOS DEL PROGRAMA:"''"1,2,3,4=HACIA ESQUINAS"''"5,6,7,8=CURSORES"''"0=LEVANTA LAPIZ"''"x=BORRADOR CON 1,2,3,4,5,6,7 Y 8"''"i=BAJA LAPIZ"''"b=BORRA PANTALLA"''"c=CIRCULO","g=MEMORIA"''"s=GRABA PANTALLA"''"t=CAMBIA COLORES"
   1 "M-Piramide  ","N-P.e.s.    ","O-Carreras  ","P-Aritmemori","Q-Copyline1 ","R-Copyline2 ","S-Pinguino","T-Pintor","U-Bosque"
   1 "I-Balistica","J-Duelostar","K-Aterriza","L-Plotter"
   1 "EDITOR DE CARACTERES","El programa esta organizado me-"
   1 "E-Pipeline  ","F-Listador  ","G-Andromeda ","H-Numeros   "
   1 "Dia del calculo    ";df:
   1 "Dia de nacimiento    ";di:
   1 "Coor. X (0 a 255)? ";a''"Coor. Y (0 a 175)?";b
   1 "Color papel y borde,0-7 ?";p''"Color tinta,0-7 ?";t:
   1 "CON CUANTOS DIGITOS QUIERE JUGAR (1 A 9) ? ";N
   1 "CICLO INTELECTUAL";:
   1 "CICLO FISICO";:
   1 "CICLO EMOCIONAL";:
   1 "Angulo? Ej:45
   1 "Altura maxima=";ym;"m."
   1 "Alcance=";xm;"m."
   1 "A-Microcopi ","B-Editor    ","C-Gugu      ","D-Biorritmos"
   1 "A PARTIR DE CUAL QUIERE CAMBIAR ? ";I
   1 "A LA DERECHA(D) O ARRIBA(A)";R$
   1 "+t$(c0,x+1
   1 "+t$(c0,i+1
   1 "+t$(c0,i)):
   1 " ANIVERSARI0":
   1 " 3 FALLOS OTRO JUEGO PULSE S";a$:
   1 "  Dia ";c;" del semiciclo ";s$
   1 "   *************************":
   1  l=load     s=save     F=fin  
   1  Vicente Mendoza                     1.983
   1  VARIACIONES 
   1  VARIABLES 
   1  PROGRAMA LISTADOR  
   1  IMPRESION 
   1  EXPLOSION 
   1  CARRETERA 
   1  ALVARO J. GOMEZ":
   1   Por favor, elija un programa  A
   1     ANDROMEDA                       
   1                                 C 
   1                                   EDITOR DE CARACTERES          
   1                                   A
   1                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               
   1                                                                                             
   1                                                   
   1                                
   1